object frmTrsSales: TfrmTrsSales
  Left = 29
  Top = 163
  Width = 696
  Height = 480
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PopupMenu = frmMainMenu.MenuShortCut
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object MainPanel: TPanel
    Left = 0
    Top = 0
    Width = 688
    Height = 450
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object ToolBar1: TToolBar
      Left = 0
      Top = 0
      Width = 688
      Height = 40
      ButtonHeight = 36
      ButtonWidth = 38
      Caption = 'ToolBar1'
      Customizable = True
      EdgeBorders = [ebBottom]
      Flat = True
      Images = frmMainMenu.SmallImageList
      ParentShowHint = False
      ShowCaptions = True
      ShowHint = True
      TabOrder = 0
      Transparent = True
      object tbtNew: TToolButton
        Tag = -10
        Left = 0
        Top = 0
        Hint = 'New Data [Ctrl+N]'
        Caption = 'New'
        ImageIndex = 0
        OnClick = tbtNewClick
      end
      object tbtSave: TToolButton
        Tag = -11
        Left = 38
        Top = 0
        Hint = 'Save Data [Ctrl+S]'
        Caption = 'Save'
        ImageIndex = 1
        OnClick = tbtSaveClick
      end
      object ToolButton5: TToolButton
        Left = 76
        Top = 0
        Width = 13
        Caption = 'ToolButton5'
        Style = tbsDivider
      end
      object tbtDelete: TToolButton
        Tag = -12
        Left = 89
        Top = 0
        Caption = 'Delete'
        ImageIndex = 2
        OnClick = tbtDeleteClick
      end
      object tbtPrint: TToolButton
        Tag = -14
        Left = 127
        Top = 0
        Caption = ' Print '
        ImageIndex = 10
        OnClick = tbtPrintClick
      end
    end
    object suiPanel1: TsuiPanel
      Left = 0
      Top = 40
      Width = 688
      Height = 148
      UIStyle = DeepBlue
      BorderColor = clBlack
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      Caption = 'Header Penjualan'
      ShowButton = False
      CaptionFontColor = clWhite
      Align = alTop
      TabOrder = 1
      Color = clWhite
      DesignSize = (
        688
        148)
      object Label2: TLabel
        Left = 598
        Top = 23
        Width = 45
        Height = 13
        Anchors = [akTop, akRight]
        Caption = 'Tanggal :'
      end
      object txtNoTrans: TAdvEdit
        Left = 8
        Top = 38
        Width = 85
        Height = 21
        AutoFocus = False
        EditAlign = eaLeft
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = False
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'No Transaksi :'
        LabelPosition = lpTopLeft
        LabelMargin = 2
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Color = clGray
        Enabled = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        HintShowLargeText = False
        ParentFont = False
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 0
        Text = 'txtNoTrans'
        Transparent = False
        Visible = True
      end
      object txtRelasi: TAdvEdit
        Left = 230
        Top = 38
        Width = 85
        Height = 21
        AutoFocus = False
        EditAlign = eaLeft
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = False
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Kode Customer :'
        LabelPosition = lpTopLeft
        LabelMargin = 2
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Color = clWindow
        Enabled = True
        HintShowLargeText = False
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 1
        Transparent = False
        Visible = True
        OnKeyDown = txtRelasiKeyDown
      end
      object btnLookUpRelasi: TButton
        Left = 281
        Top = 40
        Width = 16
        Height = 16
        Caption = '...'
        TabOrder = 8
        TabStop = False
        OnClick = btnLookUpRelasiClick
      end
      object btnNewRelasi: TButton
        Left = 297
        Top = 40
        Width = 16
        Height = 16
        Caption = 'N'
        Font.Charset = SYMBOL_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Symbol'
        Font.Style = []
        ParentFont = False
        TabOrder = 9
        TabStop = False
        OnClick = btnNewRelasiClick
      end
      object txtInfo: TAdvEdit
        Left = 376
        Top = 38
        Width = 217
        Height = 21
        AutoFocus = False
        EditAlign = eaLeft
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = True
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Nama Customer :'
        LabelPosition = lpTopLeft
        LabelMargin = 2
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Anchors = [akLeft, akTop, akRight]
        Color = clWindow
        Enabled = True
        HintShowLargeText = False
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 2
        Text = 'txtInfo'
        Transparent = False
        Visible = True
      end
      object dtpTrans: TDateTimePicker
        Left = 597
        Top = 38
        Width = 85
        Height = 21
        Anchors = [akTop, akRight]
        CalAlignment = dtaLeft
        Date = 39279.4639077894
        Time = 39279.4639077894
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 10
        OnChange = dtpTransChange
      end
      object txtKeterangan: TAdvEdit
        Left = 96
        Top = 119
        Width = 586
        Height = 21
        AutoFocus = False
        EditAlign = eaLeft
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = False
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Keterangan :'
        LabelPosition = lpTopLeft
        LabelMargin = 2
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Anchors = [akLeft, akTop, akRight]
        Color = clWindow
        Enabled = True
        HintShowLargeText = False
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 7
        Text = 'txtKeterangan'
        Transparent = False
        Visible = True
        OnKeyDown = txtKeteranganKeyDown
      end
      object txtKurs: TAdvEdit
        Left = 8
        Top = 119
        Width = 85
        Height = 21
        OnValueValidate = txtSubtotalValueValidate
        AutoFocus = False
        EditAlign = eaRight
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = True
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Kurs :'
        LabelPosition = lpTopLeft
        LabelMargin = 2
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Color = clWindow
        Enabled = True
        HintShowLargeText = False
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 6
        Text = 'txtKeterangan'
        Transparent = False
        Visible = True
        OnKeyPress = txtKursKeyPress
      end
      object txtContact: TAdvEdit
        Left = 9
        Top = 78
        Width = 206
        Height = 21
        AutoFocus = False
        EditAlign = eaLeft
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = True
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Kontak :'
        LabelPosition = lpTopLeft
        LabelMargin = 2
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Color = clWindow
        Enabled = True
        HintShowLargeText = False
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 3
        Text = '022 - 034 5567 / 08x xxx xxx xxx'
        Transparent = False
        Visible = True
      end
      object txtCity: TAdvEdit
        Left = 219
        Top = 78
        Width = 119
        Height = 21
        AutoFocus = False
        EditAlign = eaLeft
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = True
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Kota :'
        LabelPosition = lpTopLeft
        LabelMargin = 2
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Color = clWindow
        Enabled = True
        HintShowLargeText = False
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 4
        Text = 'Kalimantan Timur'
        Transparent = False
        Visible = True
      end
      object txtAddress: TAdvEdit
        Left = 342
        Top = 78
        Width = 338
        Height = 21
        AutoFocus = False
        EditAlign = eaLeft
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = True
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Alamat :'
        LabelPosition = lpTopLeft
        LabelMargin = 2
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Anchors = [akLeft, akTop, akRight]
        Color = clWindow
        Enabled = True
        HintShowLargeText = False
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 5
        Text = 'Kalimantan Timur'
        Transparent = False
        Visible = True
      end
      object txtGaransi: TAdvEdit
        Left = 96
        Top = 38
        Width = 41
        Height = 21
        AutoFocus = False
        EditAlign = eaLeft
        EditType = etNumeric
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = True
        LengthLimit = 2
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Masa Garansi (bulan) :'
        LabelPosition = lpTopLeft
        LabelMargin = 2
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Color = clWindow
        Enabled = True
        HintShowLargeText = False
        MaxLength = 2
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 11
        Text = '0'
        Transparent = False
        Visible = True
        OnKeyDown = txtGaransiKeyDown
      end
      object dtpGaransi: TDateTimePicker
        Left = 141
        Top = 38
        Width = 85
        Height = 21
        CalAlignment = dtaLeft
        Date = 39288.3807933218
        Time = 39288.3807933218
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 12
        TabStop = False
      end
      object chkUmum: TCheckBox
        Left = 319
        Top = 40
        Width = 46
        Height = 17
        Caption = 'Umum'
        TabOrder = 13
      end
    end
    object suiPanel2: TsuiPanel
      Left = 0
      Top = 188
      Width = 688
      Height = 262
      UIStyle = DeepBlue
      BorderColor = clBlack
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      Caption = 'Detail Penjualan'
      ShowButton = False
      CaptionFontColor = clWhite
      Align = alClient
      TabStop = True
      TabOrder = 2
      Color = clWhite
      DesignSize = (
        688
        262)
      object asgTrans: TAdvStringGrid
        Left = 4
        Top = 24
        Width = 680
        Height = 161
        Cursor = crDefault
        Align = alTop
        Anchors = [akLeft, akTop, akRight, akBottom]
        ColCount = 11
        DefaultRowHeight = 21
        DefaultDrawing = False
        FixedCols = 1
        RowCount = 5
        FixedRows = 1
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        GridLineWidth = 1
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected, goColSizing, goEditing]
        ParentFont = False
        TabOrder = 2
        OnKeyDown = asgTransKeyDown
        GridLineColor = clSilver
        ActiveCellShow = False
        ActiveCellFont.Charset = DEFAULT_CHARSET
        ActiveCellFont.Color = clWindowText
        ActiveCellFont.Height = -11
        ActiveCellFont.Name = 'MS Sans Serif'
        ActiveCellFont.Style = [fsBold]
        ActiveCellColor = clGray
        Bands.PrimaryColor = clInfoBk
        Bands.PrimaryLength = 1
        Bands.SecondaryColor = clWindow
        Bands.SecondaryLength = 1
        Bands.Print = False
        AutoNumAlign = True
        AutoSize = False
        VAlignment = vtaCenter
        EnhTextSize = False
        EnhRowColMove = False
        SizeWithForm = False
        Multilinecells = False
        OnGetAlignment = asgTransGetAlignment
        OnCanAddRow = asgTransCanAddRow
        OnCanEditCell = asgTransCanEditCell
        OnCellValidate = asgTransCellValidate
        OnGetEditorType = asgTransGetEditorType
        DragDropSettings.OleAcceptFiles = True
        DragDropSettings.OleAcceptText = True
        SortSettings.AutoColumnMerge = False
        SortSettings.Column = 0
        SortSettings.Show = False
        SortSettings.IndexShow = False
        SortSettings.Full = True
        SortSettings.SingleColumn = False
        SortSettings.IgnoreBlanks = False
        SortSettings.BlankPos = blFirst
        SortSettings.AutoFormat = True
        SortSettings.Direction = sdAscending
        SortSettings.FixedCols = False
        SortSettings.NormalCellsOnly = False
        SortSettings.Row = 0
        FloatingFooter.Color = clBtnFace
        FloatingFooter.Column = 0
        FloatingFooter.FooterStyle = fsFixedLastRow
        FloatingFooter.Visible = False
        ControlLook.Color = clBlack
        ControlLook.CheckSize = 15
        ControlLook.RadioSize = 10
        ControlLook.ControlStyle = csClassic
        ControlLook.FlatButton = False
        EnableBlink = False
        EnableHTML = True
        EnableWheel = True
        Flat = False
        HintColor = clInfoBk
        SelectionColor = clHighlight
        SelectionTextColor = clHighlightText
        SelectionRectangle = False
        SelectionResizer = False
        SelectionRTFKeep = False
        HintShowCells = False
        HintShowLargeText = False
        HintShowSizing = False
        PrintSettings.FooterSize = 0
        PrintSettings.HeaderSize = 0
        PrintSettings.Time = ppNone
        PrintSettings.Date = ppNone
        PrintSettings.DateFormat = 'dd/mm/yyyy'
        PrintSettings.PageNr = ppNone
        PrintSettings.Title = ppNone
        PrintSettings.Font.Charset = DEFAULT_CHARSET
        PrintSettings.Font.Color = clWindowText
        PrintSettings.Font.Height = -11
        PrintSettings.Font.Name = 'MS Sans Serif'
        PrintSettings.Font.Style = []
        PrintSettings.HeaderFont.Charset = DEFAULT_CHARSET
        PrintSettings.HeaderFont.Color = clWindowText
        PrintSettings.HeaderFont.Height = -11
        PrintSettings.HeaderFont.Name = 'MS Sans Serif'
        PrintSettings.HeaderFont.Style = []
        PrintSettings.FooterFont.Charset = DEFAULT_CHARSET
        PrintSettings.FooterFont.Color = clWindowText
        PrintSettings.FooterFont.Height = -11
        PrintSettings.FooterFont.Name = 'MS Sans Serif'
        PrintSettings.FooterFont.Style = []
        PrintSettings.Borders = pbNoborder
        PrintSettings.BorderStyle = psSolid
        PrintSettings.Centered = False
        PrintSettings.RepeatFixedRows = False
        PrintSettings.RepeatFixedCols = False
        PrintSettings.LeftSize = 0
        PrintSettings.RightSize = 0
        PrintSettings.ColumnSpacing = 0
        PrintSettings.RowSpacing = 0
        PrintSettings.TitleSpacing = 0
        PrintSettings.Orientation = poPortrait
        PrintSettings.PageNumberOffset = 0
        PrintSettings.MaxPagesOffset = 0
        PrintSettings.FixedWidth = 0
        PrintSettings.FixedHeight = 0
        PrintSettings.UseFixedHeight = False
        PrintSettings.UseFixedWidth = False
        PrintSettings.FitToPage = fpNever
        PrintSettings.PageNumSep = '/'
        PrintSettings.NoAutoSize = False
        PrintSettings.NoAutoSizeRow = False
        PrintSettings.PrintGraphics = False
        HTMLSettings.Width = 100
        HTMLSettings.XHTML = False
        Navigation.AllowInsertRow = True
        Navigation.AdvanceOnEnter = True
        Navigation.AdvanceInsert = True
        Navigation.AdvanceDirection = adLeftRight
        Navigation.AllowClipboardRowGrow = True
        Navigation.AllowClipboardColGrow = True
        Navigation.AdvanceAuto = True
        Navigation.InsertPosition = pInsertBefore
        Navigation.CopyHTMLTagsToClipboard = True
        Navigation.HomeEndKey = heFirstLastColumn
        ColumnSize.Stretch = True
        ColumnSize.Location = clRegistry
        CellNode.Color = clSilver
        CellNode.NodeColor = clBlack
        CellNode.ShowTree = False
        MaxEditLength = 0
        IntelliPan = ipVertical
        URLColor = clBlue
        URLShow = False
        URLFull = False
        URLEdit = False
        ScrollType = ssNormal
        ScrollColor = clNone
        ScrollWidth = 16
        ScrollSynch = False
        ScrollProportional = False
        ScrollHints = shNone
        OemConvert = False
        FixedFooters = 0
        FixedRightCols = 0
        FixedColWidth = 64
        FixedRowHeight = 21
        FixedFont.Charset = DEFAULT_CHARSET
        FixedFont.Color = clWindowText
        FixedFont.Height = -11
        FixedFont.Name = 'Tahoma'
        FixedFont.Style = []
        FixedAsButtons = False
        FloatFormat = '%.2n'
        IntegralHeight = False
        WordWrap = False
        ColumnHeaders.Strings = (
          'No'
          'Kode'
          'Nama Barang'
          'Seri'
          'Harga'
          'Qty'
          'Amount'
          'Disc'
          'Total')
        Lookup = False
        LookupCaseSensitive = False
        LookupHistory = False
        BackGround.Top = 0
        BackGround.Left = 0
        BackGround.Display = bdTile
        BackGround.Cells = bcNormal
        Filter = <>
        ColWidths = (
          64
          64
          64
          64
          64
          64
          64
          64
          49
          35
          79)
      end
      object txtSubtotal: TAdvEdit
        Left = 336
        Top = 188
        Width = 120
        Height = 21
        TabStop = False
        OnValueValidate = txtSubtotalValueValidate
        AutoFocus = False
        EditAlign = eaRight
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = False
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Subtotal : '
        LabelPosition = lpLeftTop
        LabelMargin = 4
        LabelTransparent = False
        LabelAlwaysEnabled = True
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Anchors = [akRight, akBottom]
        Color = clGray
        Enabled = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        HintShowLargeText = False
        ParentFont = False
        OleDropTarget = False
        OleDropSource = False
        ReadOnly = True
        Signed = False
        TabOrder = 3
        Transparent = False
        Visible = True
        OnKeyPress = txtKursKeyPress
      end
      object txtTotal: TAdvEdit
        Left = 336
        Top = 236
        Width = 120
        Height = 21
        TabStop = False
        OnValueValidate = txtSubtotalValueValidate
        AutoFocus = False
        EditAlign = eaRight
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = False
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Total : '
        LabelPosition = lpLeftTop
        LabelMargin = 4
        LabelTransparent = False
        LabelAlwaysEnabled = True
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Anchors = [akRight, akBottom]
        Color = clGray
        Enabled = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        HintShowLargeText = False
        ParentFont = False
        OleDropTarget = False
        OleDropSource = False
        ReadOnly = True
        Signed = False
        TabOrder = 4
        Transparent = False
        Visible = True
        OnKeyPress = txtKursKeyPress
      end
      object chkPayed: TCheckBox
        Left = 5
        Top = 188
        Width = 97
        Height = 17
        Anchors = [akLeft, akBottom]
        Caption = 'Sudah dibayar'
        Enabled = False
        TabOrder = 5
      end
      object txtDiscount: TAdvEdit
        Left = 336
        Top = 212
        Width = 120
        Height = 21
        OnValueValidate = txtSubtotalValueValidate
        AutoFocus = False
        EditAlign = eaRight
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = False
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Discount : '
        LabelPosition = lpLeftTop
        LabelMargin = 4
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Anchors = [akRight, akBottom]
        Color = clWindow
        Enabled = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        HintShowLargeText = False
        ParentFont = False
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 0
        Transparent = False
        Visible = True
        OnChange = txtBayarChange
        OnKeyDown = txtDiscountKeyDown
        OnKeyPress = txtKursKeyPress
      end
      object txtBayar: TAdvEdit
        Left = 563
        Top = 188
        Width = 120
        Height = 21
        OnValueValidate = txtSubtotalValueValidate
        AutoFocus = False
        EditAlign = eaRight
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = False
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Bayar : '
        LabelPosition = lpLeftTop
        LabelMargin = 4
        LabelTransparent = False
        LabelAlwaysEnabled = False
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Anchors = [akRight, akBottom]
        Color = clWindow
        Enabled = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        HintShowLargeText = False
        ParentFont = False
        OleDropTarget = False
        OleDropSource = False
        Signed = False
        TabOrder = 1
        Transparent = False
        Visible = True
        OnChange = txtBayarChange
        OnKeyDown = txtBayarKeyDown
        OnKeyPress = txtKursKeyPress
      end
      object txtSisa: TAdvEdit
        Left = 563
        Top = 212
        Width = 120
        Height = 21
        TabStop = False
        OnValueValidate = txtSubtotalValueValidate
        AutoFocus = False
        EditAlign = eaRight
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = False
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Sisa Pembayaran : '
        LabelPosition = lpLeftTop
        LabelMargin = 4
        LabelTransparent = False
        LabelAlwaysEnabled = True
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Anchors = [akRight, akBottom]
        Color = clGray
        Enabled = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        HintShowLargeText = False
        ParentFont = False
        OleDropTarget = False
        OleDropSource = False
        ReadOnly = True
        Signed = False
        TabOrder = 6
        Transparent = False
        Visible = True
        OnKeyDown = txtDiscountKeyDown
        OnKeyPress = txtKursKeyPress
      end
      object CheckBox1: TCheckBox
        Left = 96
        Top = 189
        Width = 97
        Height = 17
        Anchors = [akLeft, akBottom]
        Caption = 'Otomatis Print'
        Checked = True
        State = cbChecked
        TabOrder = 7
      end
      object mmoPesan: TMemo
        Left = 6
        Top = 208
        Width = 269
        Height = 49
        TabStop = False
        Anchors = [akLeft, akRight, akBottom]
        Lines.Strings = (
          'Pesan'
          '- Barang yang sudah dibeli tidak bisa dikembalikan'
          '- garansi hanya berlaku jika pembeli berpenampilan '
          'menarik'
          '- menyertakan surat mampu membayar dari RT/RW')
        TabOrder = 8
      end
      object txtTelahBayar: TAdvEdit
        Left = 563
        Top = 236
        Width = 120
        Height = 21
        TabStop = False
        OnValueValidate = txtSubtotalValueValidate
        AutoFocus = False
        EditAlign = eaRight
        EditType = etString
        ErrorColor = clRed
        ErrorFontColor = clWhite
        ExcelStyleDecimalSeparator = False
        Flat = False
        FlatLineColor = clBlack
        FlatParentColor = True
        FocusAlign = eaDefault
        FocusBorder = False
        FocusColor = clWindow
        FocusFontColor = clWindowText
        FocusLabel = False
        FocusWidthInc = 0
        ModifiedColor = clHighlight
        DisabledColor = clSilver
        URLColor = clBlue
        ReturnIsTab = False
        LengthLimit = 0
        TabOnFullLength = False
        Precision = 0
        LabelCaption = 'Telah Terbayar : '
        LabelPosition = lpLeftTop
        LabelMargin = 4
        LabelTransparent = False
        LabelAlwaysEnabled = True
        LabelFont.Charset = ANSI_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'Tahoma'
        LabelFont.Style = []
        Persistence.Enable = False
        Persistence.Location = plInifile
        Anchors = [akRight, akBottom]
        Color = clGray
        Enabled = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        HintShowLargeText = False
        ParentFont = False
        OleDropTarget = False
        OleDropSource = False
        ReadOnly = True
        Signed = False
        TabOrder = 9
        Transparent = False
        Visible = True
        OnKeyDown = txtDiscountKeyDown
        OnKeyPress = txtKursKeyPress
      end
    end
  end
end
